home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 March / CHIP Mart 1997.iso / SurfCam / SURFCAM.Z / MZK2H.M3 < prev    next >
Text File  |  1996-04-01  |  4KB  |  155 lines

  1. name Mazak M2 Baxis (Tombstone on Horizontal Mill 1 Degree Indexing)
  2.  
  3. O >4
  4. N >4
  5. B ->3 Limit -360 360
  6. G >2
  7. g >2 G
  8. X ->3.>4
  9. Y ->3.>4
  10. Z ->3.>4
  11. I ->3.>4
  12. J ->3.>4
  13. Q ->3.>4
  14. R ->3.>4
  15. P ->3.>4
  16. F >3.>4
  17. K ->3.>4
  18. H >2
  19. D >2
  20. T >2
  21. M >2
  22. S >4
  23. E >3.>4
  24. ( 00
  25. ) 00
  26. b 00
  27. - 00
  28. u >3.>4
  29. w >3.>4
  30. % 00
  31.  
  32. ModalGs 0 1 2 3 73 74 76 80 81 82 83 84 85  # List of g codes that are modal    
  33.  
  34. Sequence#s N 0 1 1                    # Char, freq, incr & start          
  35.  
  36. HCode X                               # X or X U  'Horizontal char.       
  37. VCode Y                               # Y or Y V  'Vertical char.         
  38. Dcode Z                               # Depth char.                       
  39. FeedCode F                            # Feed rate char.                   
  40.  
  41. comment ( )                           # Begin End comment char.           
  42.  
  43. Spaces? Y                             # Y or N  'Spaces between words     
  44.  
  45. Spindle 3 4 5                         # Cw, ccw & stop m codes            
  46. Coolant 8 9 7                         # On, Off & Mist m codes            
  47. DComp 41 42 40                        # Left, Right & Cancel m codes      
  48. LComp 43 49                           # On & Off codes                    
  49.  
  50. CtrIncremental? Y                     # Y or N  'Inc or abs I & J         
  51. ByQuadrants? N                        # Y or N  'Break arcs at quadrants  
  52.  
  53. Inc/Abs G 91 90                       # Inc & Abs char. & values          
  54.  
  55. CtrCode I J                           # I J or R or I J K L               
  56. Helical? Y
  57.  
  58. Feed G1                             # Linear move                       
  59. Rapid G0                            # Rapid positioning word            
  60. Cw G2                               # Circular move clockwise           
  61. Ccw G3                              # Circular move counter clockwise   
  62.  
  63. UppercaseComments? Y                  # Y or N 'Require uppercase comments
  64.  
  65. Drill                                 # Drilling canned/manual cycle      
  66. G98 G81 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  67. end cancel
  68.  
  69. Peck                                  # Pecking canned/manual cycle       
  70. G98 G83 X[H] Y[V] Z[D] Q[VBite] R[Vclear] F[FRate]
  71. end cancel
  72.  
  73. Tap                                   # Tapping canned/manual cycle       
  74. G98 G84 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  75. end cancel
  76.  
  77. LTap                                  # Left handed tapping cycle         
  78. G98 G74 X[H] Y[V] Z[D] R[Vclear] F[FRate] P[Dwell]
  79. end cancel
  80.  
  81. Ream                                  # Reaming canned/manual cycle       
  82. G98 G85 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  83. end cancel
  84.  
  85. Bore                                  # Boring canned/manual cycle        
  86. G98 G86 X[H] Y[V] Z[D] R[Vclear] F[FRate]  P[Dwell]
  87. end cancel
  88.  
  89. Back                                  # Back boring canned/manual cycle   
  90. G98 G87 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  91. end cancel
  92.  
  93. Cancel                                # Cancel a canned/manual cycle      
  94. G80
  95. end
  96.  
  97. Index X                               # Index the rotary table            
  98. g91 G28 Z0
  99. G28 X0 Y0
  100. B[RotAngle]
  101. G0 G90 G[WORK] X[H] Y[V]
  102. Z[D] M[Cool]
  103. End
  104.  
  105. StartCode                             # Start of the program              
  106. %0
  107. O[Program#]
  108. G0 G80 G40
  109. End
  110.  
  111. 1stToolChange                         # First tool change                 
  112. N[Block] g91 G28 Z0 M5
  113. G28 X0 Y0
  114. G30 Y0 M19
  115. T[Tool]
  116. M6
  117. M[val1]
  118. B[RotAngle]
  119. G0 G90 G[Work] X[H] Y[V] M[Direct] S[Speed]
  120. Z[D] M[Cool] T[NextTool]
  121. End
  122.  
  123. Infeed                                # Enable cutter comp                
  124. G1 Z[D] F[Plunge]
  125. G17 G[Side] X[H] Y[V] D[DComp] F[FRate]
  126. end
  127.  
  128. Outfeed                               # Disable cutter comp               
  129. G1 G40 X[H] Y[V]
  130. Z[D]
  131. end
  132.  
  133. ToolChange                            # Secondary tool changes            
  134. M9
  135. g91 G28 Z0
  136. G28 X0 Y0
  137. N[Block] G30 Y0 M19
  138. T[Tool]
  139. M6
  140. M[val1]
  141. B[RotAngle]
  142. G0 G90 G[Work] X[H] Y[V] M[Direct] S[Speed]
  143. Z[D] M[Cool] T[NextTool]
  144. End
  145.  
  146. EndCode                               # End of the program                
  147. g91 G28 Z0
  148. G28 X0 Y0
  149. M30
  150. %0
  151. End
  152.  
  153. ask [val1] " Enter spindle range or press enter for default: " "38"
  154.  
  155.